home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / data / fapx / fapxsetm.plp < prev    next >
Text File  |  1993-07-08  |  5KB  |  119 lines
  1. %setAT    {
  2.     var type[10];
  3.     SNDMSG({erande_f.snd});footnote({モデムのタイプを選択して下さい});
  4.     type:=
  5.     @select({どういうタイプのモデムですか？},
  6.         Wtime4,{im({1200n})},
  7.         { １２００　                  ＭＮＰなし },{im({1200n})},
  8.         { ２４００　                  ＭＮＰなし },{im({2400n})},
  9.         { ２４００(端末速度2400)　    ＭＮＰあり },{im({2400m})},
  10.         { ２４００(端末速度4800)　    ＭＮＰあり },{im({4800m})},
  11.         { 2400以上(端末速度9600以上)　ＭＮＰあり },{im({9600m})});
  12.     SNDMSG({nyuryo_f.snd});
  13.     footnote({ＡＴコマンドを設定して下さい});
  14.     %a @input({ATコマンドを設定して下さい  例｢ATX3\N3\V1\Q3\J0｣},,
  15.             {AT}|@head(MODEM,{/}));
  16.     case(a<>{},{Yes},
  17.         {case(@getchar(a,1,2),{AT},
  18.             {case(a=@head(a,{\}),{Yes},
  19.                 {MODEM:=@getchar(a,3,999)|{/}|
  20.                     @getchar(a,3,999)|{/AT直接指定_}|type;},                ,{MODEM:=@getchar(a,3,999)|{/}|
  21.                     {/AT直接指定_}|type;})});
  22.         },{No},{setAT});
  23.     };
  24.  
  25. %FUJITSU{
  26.     SNDMSG({erande_f.snd});footnote({モデムの機種を選んで下さい});
  27.     select({モデムの機種を選んで下さい  現在は｢}|@modem|{｣です},
  28.     Wtime4,{},
  29.     {内蔵1200},{MODEM:={X3//内蔵1200_1200n}},
  30.     {内蔵2400},{MODEM:={X3/\N3\V1\Q3\J0%C0/内蔵2400_9600m}},
  31.     {富士通 PM1200F},{MODEM:={X3//PM1200F_1200n}},
  32.     {富士通 PM2400F},{MODEM:={X3/\N3\V2\Q3\J0%C0/PM2400F_9600m}},
  33.     {富士通 PM2400FII},{MODEM:={X3/\N7\Q3\J0\V2%C0/PM2400FII_9600m}},
  34.     {富士通 OAMD-301},{MODEM:={X3&D2/\N3\Q3\J0\V2/OAMD-301_9600m}},
  35.     {ATコマンド直設定 },{setAT},{変更しない},{}
  36.     )};
  37.  
  38. %AIWA    {
  39.     SNDMSG({erande_f.snd});footnote({モデムの機種を選んで下さい});
  40.     select({モデムの機種を選んで下さい  現在は｢}|@modem|{｣です},
  41.     Wtime4,{},
  42.     {AIWA PV-A1200},{MODEM:={X3//PV-A1200_1200n}},
  43.     {AIWA PV-A2400},{MODEM:={X3//PV-A2400_2400n}},
  44.     {AIWA PV-A2400MNP4},{MODEM:={&D2/&M4\Q1/PV-A2400MNP4_9600m}},
  45.     {AIWA PV-A24MNP5},{MODEM:={X3&D2/\N3\Q3\J0/PV-A24MNP5_9600m}},
  46.     {AIWA PV-A24V42},{MODEM:={X3&D2/\N3\Q3\J0/PV-A24V42_9600m}},
  47.     {AIWA PV-M24},{MODEM:={X3&D2/\N3\Q3\J0\V2/PV-M24_9600m}},
  48.     {AIWA PV-M24M5},{MODEM:={X3&D2/\N3\Q3\J0\V2/PV-M24M5_9600m}},
  49.     {AIWA PV-M24B5},{MODEM:={X3&D2/\N3\Q3\J0\V2%C0/PV-M24B5_9600m}},
  50.     {AIWA PV-A96V5},{MODEM:={X3&D2/\N3\Q3\J0\V2%C0/PV-A96V5_9600m}},
  51.     {ATコマンド直設定 },{setAT},{変更しない},{}
  52.     )};
  53.  
  54. %OMRON    {
  55.     SNDMSG({erande_f.snd});footnote({モデムの機種を選んで下さい});
  56.     select({モデムの機種を選んで下さい  現在は｢}|@modem|{｣です},
  57.     Wtime4,{},
  58.     {OMRON MD1200},{MODEM:={X3//MD1200_1200n}},
  59.     {OMRON MD12FS},{MODEM:={X3//MD12FS_1200n}},
  60.     {OMRON MD2400F},{MODEM:={X3/\N3\V1\Q2\J0/MD2400F_2400m}},
  61.     {OMRON MD24FB5V},{MODEM:={X3/\N3\Q2\J0\V2%C0/MD24FB5V_9600m}},
  62.     {OMRON MD24FP4},{MODEM:={X3/\N3\Q2\J0/MD24FP4_2400m}},
  63.     {OMRON MD24FP4II},{MODEM:={X3&P2/\N3\Q2\J0/MD24FP4II_9600m}},
  64.     {OMRON MD24FP5V},{MODEM:={X3/\N3\Q2\J0\V2%C0/MD24FP5V_9600m}},
  65.     {OMRON MD24FS4},{MODEM:={X3/\N3\Q2\J0/MD24FS4_2400m}},
  66.     {OMRON MD24FS5},{MODEM:={X3/\N3\Q2\J0/MD24FS5_2400m}},
  67.     {OMRON MD24FS7},{MODEM:={X3/\N3\Q2\J0/MD24FS7_2400m}},
  68.     {OMRON MD96FB5V},{MODEM:={X3&E0/\N3%C1&M5*C1\D0\J0/MD96FB5V_9600m}},
  69.     {ATコマンド直設定 },{setAT},{変更しない},{}
  70.     )};
  71.  
  72. %EPSON    {
  73.     SNDMSG({erande_f.snd});footnote({モデムの機種を選んで下さい});
  74.     select({モデムの機種を選んで下さい  現在は｢}|@modem|{｣です},
  75.     Wtime4,{},
  76.     {EPSON SR-120S},{MODEM:={X3//SR-120S_1200n}},
  77.     {EPSON SR-240AT},{MODEM:={X3//SR-240AT_2400n}},
  78.     {EPSON SR-240V},{MODEM:={X3\V2/N1&K1%C0/SR-240V_9600m}},
  79.     {},{},{ATコマンド直設定 },{setAT},{変更しない},{}
  80.     )};
  81.  
  82. %NEC    {
  83.     SNDMSG({erande_f.snd});footnote({モデムの機種を選んで下さい});
  84.     select({モデムの機種を選んで下さい  現在は｢}|@modem|{｣です},
  85.     Wtime4,{},
  86.     {NEC COMSTAR 2424},{MODEM:={X3/\N3\Q2/COMSTAR 2424_2400m}},
  87.     {},{},{ATコマンド直設定 },{setAT},{変更しない},{}
  88.     )};
  89.  
  90. %SONY    {
  91.     SNDMSG({erande_f.snd});footnote({モデムの機種を選んで下さい});
  92.     select({モデムの機種を選んで下さい  現在は｢}|@modem|{｣です},
  93.     Wtime4,{},
  94.     {SONY IT-V1200},{MODEM:={X3//IT-V1200_1200n}},
  95.     {},{},{ATコマンド直設定 },{setAT},{変更しない},{}
  96.     )};
  97.  
  98. %MICROCORE{
  99.     SNDMSG({erande_f.snd});footnote({モデムの機種を選んで下さい});
  100.     select({モデムの機種を選んで下さい  現在は｢}|@modem|{｣です},
  101.     Wtime4,{},
  102.     {MICROCORE MC24PA5},{MODEM:={X3/\N3\Q2\J0\X1%C0/MC24PA5_9600m}},
  103.     {},{},{ATコマンド直設定 },{setAT},{変更しない},{}
  104.     )};
  105.  
  106. %setMODEM{
  107.     %modem    {case(MODEM,{},{im({未設定})},,{head(@tail(MODEM,{/}),{_})})};
  108.     SNDMSG({erande_f.snd});footnote({モデムのメーカーを選んで下さい});
  109.     select({モデムのメーカーを選んで下さい},
  110.     Wtime4,{},
  111.     {  ＦＵＪＩＴＳＵ  },{FUJITSU},    {     ＡＩＷＡ     },{AIWA},
  112.     {    ＯＭＲＯＮ    },{OMRON},    {    ＥＰＳＯＮ    },{EPSON},
  113.     {      ＮＥＣ      },{NEC},    {     ＳＯＮＹ     },{SONY},
  114.     {   マイクロコア   },{MICROCORE},
  115.     { ATコマンド直設定 },{setAT}
  116.     )};
  117.  
  118. setMODEM;
  119.